﻿Imports System.ComponentModel
Imports DevExpress.Skins
Imports DevExpress.LookAndFeel
Imports DevExpress.UserSkins
Imports DevExpress.XtraBars
Imports DevExpress.XtraBars.Ribbon
Imports DevExpress.XtraBars.Helpers
Imports DevExpress.XtraSplashScreen

Public Class Main
    Sub New()
        SplashScreenManager.ShowForm(GetType(WaitForm1))
        InitSkins()
        InitializeComponent()
        Me.InitSkinGallery()
        Me.ribbonControl.Minimized = True
        SplashScreenManager.CloseForm()
    End Sub
    Sub InitSkins()
        DevExpress.Skins.SkinManager.EnableFormSkins()
        DevExpress.UserSkins.BonusSkins.Register()
        UserLookAndFeel.Default.SetSkinStyle("Money Twins")
    End Sub
    Private Sub InitSkinGallery()
        SkinHelper.InitSkinGallery(rgbiSkins, True)
    End Sub
    Private Sub Main_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub
    Private Sub BarButtonItemChiNhanh_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemChiNhanh.ItemClick
        DM_ChiNhanh.Show()
        DM_ChiNhanh.MdiParent = Me
        DM_ChiNhanh.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemKhachHang_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemKhachHang.ItemClick
        DM_KhachHang.Show()
        DM_KhachHang.MdiParent = Me
        DM_KhachHang.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemKhaiBaoSoHoaDon_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemKhaiBaoSoHoaDon.ItemClick
        DM_KhaiBaoSoHoaDon.Show()
        DM_KhaiBaoSoHoaDon.MdiParent = Me
        DM_KhaiBaoSoHoaDon.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemKheUocVay_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemKheUocVay.ItemClick
        DM_KheUocVay.Show()
        DM_KheUocVay.MdiParent = Me
        DM_KheUocVay.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemKho_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemKho.ItemClick
        DM_Kho.Show()
        DM_Kho.MdiParent = Me
        DM_Kho.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemKhoanMucPhi_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemKhoanMucPhi.ItemClick
        DM_KhoanMucPhi.Show()
        DM_KhoanMucPhi.MdiParent = Me
        DM_KhoanMucPhi.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemLapUyNhiemChi_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemLapUyNhiemChi.ItemClick
        DM_LapUyNhiemChi.Show()
        DM_LapUyNhiemChi.MdiParent = Me
        DM_LapUyNhiemChi.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItem2_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemLoai.ItemClick
        DM_Loai.Show()
        DM_Loai.MdiParent = Me
        DM_Loai.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemMauIn_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemMauIn.ItemClick
        DM_MauIn.Show()
        DM_MauIn.MdiParent = Me
        DM_MauIn.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNganHang_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNganHang.ItemClick
        DM_NganHang.Show()
        DM_NganHang.MdiParent = Me
        DM_NganHang.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNganhNghe_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNganhNghe.ItemClick
        DM_NganhNghe.Show()
        DM_NganhNghe.MdiParent = Me
        DM_NganhNghe.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNghiepVu_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNghiepVu.ItemClick
        DM_NghiepVu.Show()
        DM_NghiepVu.MdiParent = Me
        DM_NghiepVu.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNguonLuc_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNguonLuc.ItemClick
        DM_LapUyNhiemChi.Show()
        DM_LapUyNhiemChi.MdiParent = Me
        DM_LapUyNhiemChi.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNguonVon_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNguonVon.ItemClick
        DM_NguonVon.Show()
        DM_NguonVon.MdiParent = Me
        DM_NguonVon.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemNhanVien_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemNhanVien.ItemClick
        DM_NhanVien.Show()
        DM_NhanVien.MdiParent = Me
        DM_NhanVien.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemPhanLoai_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemPhanLoai.ItemClick
        DM_PhanLoai.Show()
        DM_PhanLoai.MdiParent = Me
        DM_PhanLoai.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemPhongBan_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemPhongBan.ItemClick
        DM_PhongBan.Show()
        DM_PhongBan.MdiParent = Me
        DM_PhongBan.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemPhuongXa_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemPhuongXa.ItemClick
        DM_PhuongXa.Show()
        DM_PhuongXa.MdiParent = Me
        DM_PhuongXa.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemTinhTrang_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemTinhTrang.ItemClick
        DM_TinhTrang.Show()
        DM_TinhTrang.MdiParent = Me
        DM_TinhTrang.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItemTienMat_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemTienMat.ItemClick
        'DM_HangHoa.Show()
        'DM_HangHoa.MdiParent = Me
        'DM_HangHoa.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItem3_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
        BH_BanHangNuocNgoai.Show()
        BH_BanHangNuocNgoai.MdiParent = Me
        BH_BanHangNuocNgoai.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItem2_ItemClick_1(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
        MH_MuaHangTrongNuoc.Show()
        MH_MuaHangTrongNuoc.MdiParent = Me
        MH_MuaHangTrongNuoc.WindowState = FormWindowState.Maximized
    End Sub

    Private Sub BarButtonItem1_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
    End Sub
End Class
